home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / qmsstins.arc / DIR.HST < prev    next >
Encoding:
Text File  |  1987-09-20  |  295 b   |  14 lines
  1. ;
  2. ; DIR subroutine for HOST.HST
  3. ;
  4.    Writeln " "
  5.    Writeln "       Files that can be downloaded"
  6.    Writeln "____________________________________________"
  7.    Writeln " "
  8.  
  9.    DOS "DIR *.* > Dir.Lst"
  10.    Upload  Dir.Lst A 3 0 0
  11.    Writeln " "
  12.    Writeln " _ End of List _"
  13.    Return
  14.